home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Math Factory™ Demo ••••• / Math Factory™ Demo •••••.rsrc / CODE_18.txt < prev    next >
Text File  |  1988-01-30  |  10KB  |  176 lines
  1. # near model CODE resource
  2. # jump table entries: 640-641 (2 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. export_81:
  5. 00000004  4E56 FEFE                link       A6, -0x0102
  6. 00000008  302E 000C                move.w     D0, [A6 + 0xC]
  7. 0000000C  E548                     lsl        D0.w, 2
  8. 0000000E  206E 0008                movea.l    A0, [A6 + 0x8]
  9. 00000012  2F30 009C                move.l     -[A7], [A0 + D0.w - 0x100]
  10. 00000016  486D FB36                pea.l      [A5 - 0x4CA]
  11. 0000001A  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  12. 0000001E  7000                     moveq.l    D0, 0x00
  13. 00000020  102D FB36                move.b     D0, [A5 - 0x4CA]
  14. 00000024  48C0                     ext.l      D0
  15. 00000026  226E 0008                movea.l    A1, [A6 + 0x8]
  16. 0000002A  2340 FFF8                move.l     [A1 - 0x8], D0
  17. 0000002E  206E 0008                movea.l    A0, [A6 + 0x8]
  18. 00000032  0CA8 0000 0001 FFF8      cmpi.l     [A0 - 0x8], 0x1
  19. 0000003A  6F00 004E                ble        +0x50 /* 0000008A */
  20. 0000003E  2F07                     move.l     -[A7], D7
  21. 00000040  206E 0008                movea.l    A0, [A6 + 0x8]
  22. 00000044  2028 FFF8                move.l     D0, [A0 - 0x8]
  23. 00000048  7E01                     moveq.l    D7, 0x01
  24. 0000004A  9E40                     sub.w      D7, D0
  25. 0000004C  6E00 0036                bgt        +0x38 /* 00000084 */
  26. 00000050  3D40 FFFE                move.w     [A6 - 0x2], D0
  27. 00000054  4447                     neg.w      D7
  28. label00000056:
  29. 00000056  302D E2D6                move.w     D0, [A5 - 0x1D2A]
  30. 0000005A  E348                     lsl        D0.w, 1
  31. 0000005C  322E FFFE                move.w     D1, [A6 - 0x2]
  32. 00000060  7400                     moveq.l    D2, 0x00
  33. 00000062  41ED FB36                lea.l      A0, [A5 - 0x4CA]
  34. 00000066  1430 1000                move.b     D2, [A0 + D1.w]
  35. 0000006A  43ED E2D6                lea.l      A1, [A5 - 0x1D2A]
  36. 0000006E  3382 0000                move.w     [A1 + D0.w], D2
  37. 00000072  302D E2D6                move.w     D0, [A5 - 0x1D2A]
  38. 00000076  5240                     addq.w     D0, 1
  39. 00000078  3B40 E2D6                move.w     [A5 - 0x1D2A], D0
  40. 0000007C  536E FFFE                subq.w     [A6 - 0x2], 1
  41. 00000080  51CF FFD4                dbf        D7, -0x2E /* 00000056 */
  42. label00000084:
  43. 00000084  2E1F                     move.l     D7, [A7]+
  44. 00000086  6000 0020                bra        +0x22 /* 000000A8 */
  45. label0000008A:
  46. 0000008A  302D E2D6                move.w     D0, [A5 - 0x1D2A]
  47. 0000008E  E348                     lsl        D0.w, 1
  48. 00000090  7200                     moveq.l    D1, 0x00
  49. 00000092  122D FB37                move.b     D1, [A5 - 0x4C9]
  50. 00000096  43ED E2D6                lea.l      A1, [A5 - 0x1D2A]
  51. 0000009A  3381 0000                move.w     [A1 + D0.w], D1
  52. 0000009E  302D E2D6                move.w     D0, [A5 - 0x1D2A]
  53. 000000A2  5240                     addq.w     D0, 1
  54. 000000A4  3B40 E2D6                move.w     [A5 - 0x1D2A], D0
  55. label000000A8:
  56. 000000A8  4E5E                     unlink     A6
  57. 000000AA  205F                     movea.l    A0, [A7]+
  58. 000000AC  5C8F                     addq.l     A7, 6
  59. 000000AE  4ED0                     jmp        [A0]
  60. 000000B0  0000 0000                ori.b      D0, 0x0
  61. export_80:
  62. 000000B4  4E56 FDA0                link       A6, -0x0260
  63. 000000B8  2F07                     move.l     -[A7], D7
  64. 000000BA  7001                     moveq.l    D0, 0x01
  65. 000000BC  7E14                     moveq.l    D7, 0x14
  66. 000000BE  9E40                     sub.w      D7, D0
  67. 000000C0  6D00 001C                blt        +0x1E /* 000000DE */
  68. 000000C4  3D40 FFFE                move.w     [A6 - 0x2], D0
  69. label000000C8:
  70. 000000C8  302E FFFE                move.w     D0, [A6 - 0x2]
  71. 000000CC  E548                     lsl        D0.w, 2
  72. 000000CE  41EE FF9C                lea.l      A0, [A6 - 0x64]
  73. 000000D2  42B0 0000                clr.l      [A0 + D0.w]
  74. 000000D6  526E FFFE                addq.w     [A6 - 0x2], 1
  75. 000000DA  51CF FFEC                dbf        D7, -0x16 /* 000000C8 */
  76. label000000DE:
  77. 000000DE  2E1F                     move.l     D7, [A7]+
  78. 000000E0  2F07                     move.l     -[A7], D7
  79. 000000E2  7001                     moveq.l    D0, 0x01
  80. 000000E4  7E32                     moveq.l    D7, 0x32
  81. 000000E6  9E40                     sub.w      D7, D0
  82. 000000E8  6D00 0036                blt        +0x38 /* 00000120 */
  83. 000000EC  3D40 FFFE                move.w     [A6 - 0x2], D0
  84. label000000F0:
  85. 000000F0  302E FFFE                move.w     D0, [A6 - 0x2]
  86. 000000F4  E748                     lsl        D0.w, 3
  87. 000000F6  41ED E334                lea.l      A0, [A5 - 0x1CCC]
  88. 000000FA  4870 0000                pea.l      [A0 + D0.w]
  89. 000000FE  4267                     clr.w      -[A7]
  90. 00000100  4267                     clr.w      -[A7]
  91. 00000102  4267                     clr.w      -[A7]
  92. 00000104  4267                     clr.w      -[A7]
  93. 00000106  A8A7                     syscall    SetRect
  94. 00000108  302E FFFE                move.w     D0, [A6 - 0x2]
  95. 0000010C  E348                     lsl        D0.w, 1
  96. 0000010E  43ED E2D6                lea.l      A1, [A5 - 0x1D2A]
  97. 00000112  33BC 0020 0000           move.w     [A1 + D0.w], 0x20 /* ' ' */
  98. 00000118  526E FFFE                addq.w     [A6 - 0x2], 1
  99. 0000011C  51CF FFD2                dbf        D7, -0x30 /* 000000F0 */
  100. label00000120:
  101. 00000120  2E1F                     move.l     D7, [A7]+
  102. 00000122  3B7C 0001 E2D6           move.w     [A5 - 0x1D2A], 0x1
  103. 00000128  302D E9C6                move.w     D0, [A5 - 0x163A]
  104. 0000012C  C1FC 0016                muls.w     D0, 0x16
  105. 00000130  7200                     moveq.l    D1, 0x00
  106. 00000132  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  107. 00000136  1230 0000                move.b     D1, [A0 + D0.w]
  108. 0000013A  48C1                     ext.l      D1
  109. 0000013C  2D41 FFF4                move.l     [A6 - 0xC], D1
  110. 00000140  302D E9C6                move.w     D0, [A5 - 0x163A]
  111. 00000144  E548                     lsl        D0.w, 2
  112. 00000146  41ED E8D2                lea.l      A0, [A5 - 0x172E]
  113. 0000014A  2F30 0000                move.l     -[A7], [A0 + D0.w]
  114. 0000014E  486E FEA0                pea.l      [A6 - 0x160]
  115. 00000152  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  116. 00000156  7000                     moveq.l    D0, 0x00
  117. 00000158  102E FEA0                move.b     D0, [A6 - 0x160]
  118. 0000015C  48C0                     ext.l      D0
  119. 0000015E  2D40 FFF8                move.l     [A6 - 0x8], D0
  120. 00000162  3D7C 0001 FFFC           move.w     [A6 - 0x4], 0x1
  121. 00000168  2F07                     move.l     -[A7], D7
  122. 0000016A  202E FFF8                move.l     D0, [A6 - 0x8]
  123. 0000016E  7E01                     moveq.l    D7, 0x01
  124. 00000170  9E40                     sub.w      D7, D0
  125. 00000172  6E00 0096                bgt        +0x98 /* 0000020A */
  126. 00000176  3D40 FFFE                move.w     [A6 - 0x2], D0
  127. 0000017A  4447                     neg.w      D7
  128. label0000017C:
  129. 0000017C  302E FFFE                move.w     D0, [A6 - 0x2]
  130. 00000180  7200                     moveq.l    D1, 0x00
  131. 00000182  41EE FEA0                lea.l      A0, [A6 - 0x160]
  132. 00000186  1230 0000                move.b     D1, [A0 + D0.w]
  133. 0000018A  0241 00FF                andi.w     D1, 0xFF
  134. 0000018E  0041 0100                ori.w      D1, 0x100
  135. 00000192  3D41 FDA0                move.w     [A6 - 0x260], D1
  136. 00000196  486E FDA0                pea.l      [A6 - 0x260]
  137. 0000019A  486D FA36                pea.l      [A5 - 0x5CA]
  138. 0000019E  3F3C 00FF                move.w     -[A7], 0xFF
  139. 000001A2  4EAD 01BA                jsr        [A5 + 0x1BA /* export_51 */]
  140. 000001A6  486D FA36                pea.l      [A5 - 0x5CA]
  141. 000001AA  486E FFF0                pea.l      [A6 - 0x10]
  142. 000001AE  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  143. 000001B2  302E FFFC                move.w     D0, [A6 - 0x4]
  144. 000001B6  E548                     lsl        D0.w, 2
  145. 000001B8  43EE FF9C                lea.l      A1, [A6 - 0x64]
  146. 000001BC  23AE FFF0 0000           move.l     [A1 + D0.w], [A6 - 0x10]
  147. 000001C2  302E FFFC                move.w     D0, [A6 - 0x4]
  148. 000001C6  E748                     lsl        D0.w, 3
  149. 000001C8  222E FFF4                move.l     D1, [A6 - 0xC]
  150. 000001CC  5881                     addq.l     D1, 4
  151. 000001CE  E749                     lsl        D1.w, 3
  152. 000001D0  41ED E684                lea.l      A0, [A5 - 0x197C]
  153. 000001D4  41F0 1000                lea.l      A0, [A0 + D1.w]
  154. 000001D8  43ED E334                lea.l      A1, [A5 - 0x1CCC]
  155. 000001DC  43F1 0000                lea.l      A1, [A1 + D0.w]
  156. 000001E0  22D8                     move.l     [A1]+, [A0]+
  157. 000001E2  22D8                     move.l     [A1]+, [A0]+
  158. 000001E4  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  159. 000001E8  2F0E                     move.l     -[A7], A6
  160. 000001EA  4EAD 02AA                jsr        [A5 + 0x2AA /* export_81 */]
  161. 000001EE  302E FFFC                move.w     D0, [A6 - 0x4]
  162. 000001F2  5240                     addq.w     D0, 1
  163. 000001F4  3D40 FFFC                move.w     [A6 - 0x4], D0
  164. 000001F8  202E FFF4                move.l     D0, [A6 - 0xC]
  165. 000001FC  5380                     subq.l     D0, 1
  166. 000001FE  2D40 FFF4                move.l     [A6 - 0xC], D0
  167. 00000202  536E FFFE                subq.w     [A6 - 0x2], 1
  168. 00000206  51CF FF74                dbf        D7, -0x8E /* 0000017C */
  169. label0000020A:
  170. 0000020A  2E1F                     move.l     D7, [A7]+
  171. 0000020C  302D E2D6                move.w     D0, [A5 - 0x1D2A]
  172. 00000210  5340                     subq.w     D0, 1
  173. 00000212  3B40 E2D6                move.w     [A5 - 0x1D2A], D0
  174. 00000216  4E5E                     unlink     A6
  175. 00000218  4E75                     rts
  176.